home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 April / Macworld (1999-04).dmg / Cool Specials / Al Morale Demo / Al's Stuff / F199.DCR / 00500_Yes script.ls next >
Encoding:
Text File  |  1999-02-16  |  434 b   |  20 lines
  1. on enterFrame
  2.   repeat with n = 2 to 10
  3.     puppetSprite(n, 1)
  4.     set the visible of sprite n to 0
  5.   end repeat
  6.   set the visible of sprite 9 to 1
  7.   puppetSound(1, "fYes.AIF")
  8.   updateStage()
  9.   startTimer()
  10.   repeat while the timer < 12
  11.   end repeat
  12.   set the visible of sprite 9 to 0
  13.   set the visible of sprite 6 to 1
  14.   updateStage()
  15.   startTimer()
  16.   repeat while the timer < 12
  17.   end repeat
  18.   set the visible of sprite 6 to 0
  19. end
  20.